From: Paul Eggert Date: Mon, 13 Jun 2011 05:24:58 +0000 (-0700) Subject: * lisp.h (CHAR_TABLE_SET): Omit now-redundant test. X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~324^2~3446^2~29 X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=4a7514c8a0784e108111e4a7165420aecf45316f;p=emacs.git * lisp.h (CHAR_TABLE_SET): Omit now-redundant test. --- diff --git a/src/ChangeLog b/src/ChangeLog index 05a95c93945..8a51121d5e2 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,5 +1,7 @@ 2011-06-13 Paul Eggert + * lisp.h (CHAR_TABLE_SET): Omit now-redundant test. + * lread.c (Fload): Don't compare a possibly-garbage time_t value. GLYPH_CODE_FACE returns EMACS_INT, not int. diff --git a/src/lisp.h b/src/lisp.h index 1324440c700..389762a07e5 100644 --- a/src/lisp.h +++ b/src/lisp.h @@ -941,8 +941,7 @@ struct Lisp_Vector /* Equivalent to Faset (CT, IDX, VAL) with optimization for ASCII and 8-bit European characters. Do not check validity of CT. */ #define CHAR_TABLE_SET(CT, IDX, VAL) \ - (((IDX) >= 0 && ASCII_CHAR_P (IDX) \ - && SUB_CHAR_TABLE_P (XCHAR_TABLE (CT)->ascii)) \ + (ASCII_CHAR_P (IDX) && SUB_CHAR_TABLE_P (XCHAR_TABLE (CT)->ascii) \ ? XSUB_CHAR_TABLE (XCHAR_TABLE (CT)->ascii)->contents[IDX] = VAL \ : char_table_set (CT, IDX, VAL))